Przekrój ostrosłupa prawidłowego
trójkątnego płaszczyzną równoległą
do płaszczyzny podstawy.

Ustal wymiary ostrosłupa oraz 
polożenie punktu G

Opracował: Piotr Leszczyński

Pole przekroju =

Obwód przekroju =

a = 6 (slider from 0.1 to 10, step 0.1)
h = 6 (slider from 0.1 to 10, step 0.1)
α = 2.356194490192345 rad (slider from 0° to 180°, step 0.01°)
B: (((-a)) / 2, ((-a) * sqrt(3) / 6), 0)
C = Mirror(B, yAxis)
wielokąt1, f, g, i, A = Polygon(B, C, 3, xOyPlane)
S: (0, 0, h)
b, powierzchniaBCS, powierzchniaACS, powierzchniaABS, krawędźBS, krawędźCS, krawędźAS = Pyramid(wielokąt1, S)
j = OrthogonalLine(S, wielokąt1)
O = Intersect(j, wielokąt1)
k = Segment(S, O)
l = Line(O, C)
m = Line(A, O)
n = Line(B, O)
D = Intersect(f, m)
E = Intersect(l, i)
F = Intersect(g, n)
p = Segment(E, C)
q = Segment(D, A)
r = Segment(F, B)
p1 = true
p2 = true
G = Point(k)
s = Line(G, p)
H = Intersect(krawędźCS, s)
t = Line(G, r)
I = Intersect(krawędźBS, t)
c = Plane(G, I, H)
J = Intersect(krawędźAS, c)
t1, h_1, j_1, i_1 = Polygon(J, I, H)
tekst4: "" + t1 + ""
tekst5: "" + (h_1 + i_1 + j_1) + ""